Define CharList
 ( 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
   'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f',
   'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v',
   'w', 'x', 'y', 'z', '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', '~', '`',
   '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '-', '_', '=', '+', '[', '{',
   ']', '}', ';', ':',"'", '"', ',', '<', '.', '>', '/', '?');

Define WidthList
 (  55,  45,  31,  48,  42,  43,  40,  55,  31,  39,  42,  40,  56,  53,  35,  43,
    38,  49,  35,  40,  45,  44,  62,  41,  48,  37,  25,  23,  20,  25,  21,  18,
    23,  26,  14,  16,  23,  14,  38,  27,  22,  23,  22,  22,  19,  16,  25,  18,
    30,  18,  23,  21,  25,  25,  25,  25,  25,  25,  25,  25,  25,  25,  35,  27,
    15,  39,  25,  25,  36,  27,  42,  25,  19,  19,  10,  27,  25,  25,  24,  23,
    21,  23,  13,  13,  15,  25,  13,  27,  13,  27,  20,  22);

Define RectList
 ( (   0,  0, 73, 75), (  74,  0, 69, 75), ( 144,  0, 51, 75), ( 196,  0, 71, 75),
   ( 268,  0, 73, 75), ( 342,  0, 71, 75), ( 414,  0, 54, 75), ( 469,  0, 73, 75),
   ( 543,  0, 41, 75), ( 585,  0, 54, 75), ( 640,  0, 64, 75), ( 705,  0, 68, 75),
   ( 774,  0, 75, 75), ( 850,  0, 79, 75), ( 930,  0, 51, 75), ( 982,  0, 66, 75),
   (1049,  0, 55, 75), (1105,  0, 81, 75), (1187,  0, 53, 75), (1241,  0, 65, 75),
   (1307,  0, 65, 75), (1373,  0, 66, 75), (1440,  0, 83, 75), (1524,  0, 61, 75),
   (1586,  0, 66, 75), (1653,  0, 55, 75), (1709,  0, 40, 75), (1750,  0, 38, 75),
   (1789,  0, 36, 75), (1826,  0, 45, 75), (1872,  0, 37, 75), (1910,  0, 50, 75),
   (1961,  0, 48, 75), (2010,  0, 42, 75), (2053,  0, 30, 75), (2084,  0, 51, 75),
   (2136,  0, 39, 75), (2176,  0, 34, 75), (2211,  0, 54, 75), (2266,  0, 42, 75),
   (2309,  0, 37, 75), (2347,  0, 45, 75), (2393,  0, 36, 75), (2430,  0, 37, 75),
   (2468,  0, 33, 75), (2502,  0, 32, 75), (2535,  0, 41, 75), (2577,  0, 35, 75),
   (2613,  0, 47, 75), (2661,  0, 36, 75), (2698,  0, 47, 75), (2746,  0, 36, 75),
   (2783,  0, 41, 75), (2825,  0, 33, 75), (2859,  0, 40, 75), (2900,  0, 41, 75),
   (2942,  0, 41, 75), (2984,  0, 41, 75), (3026,  0, 38, 75), (3065,  0, 37, 75),
   (3103,  0, 41, 75), (3145,  0, 37, 75), (3183,  0, 43, 75), (3227,  0, 24, 75),
   (3252,  0, 31, 75), (3284,  0, 54, 75), (3339,  0, 43, 75), (3383,  0, 38, 75),
   (3422,  0, 45, 75), (3468,  0, 43, 75), (3512,  0, 54, 75), (3567,  0, 34, 75),
   (3602,  0, 35, 75), (3638,  0, 35, 75), (3674,  0, 26, 75), (3701,  0, 43, 75),
   (3745,  0, 42, 75), (3788,  0, 39, 75), (3828,  0, 45, 75), (3874,  0, 44, 75),
   (3919,  0, 46, 75), (3966,  0, 44, 75), (4011,  0, 26, 75), (4038,  0, 25, 75),
   (4064,  0, 25, 75), (4090,  0, 35, 75), (4126,  0, 24, 75), (4151,  0, 39, 75),
   (4191,  0, 23, 75), (4215,  0, 39, 75), (4255,  0, 37, 75), (4293,  0, 36, 75));

Define OffsetList
 ( (-8, 0), (-13, 0), (-5, 0), (-13, 0), (-13, 0), (-9, 0), (-6, 0), (-9, 0),
   (-2, 0), (-7, 0), (-2, 0), (-13, 0), (-8, 0), (-8, 0), (-5, 0), (-8, 0),
   (-3, 0), (-8, 0), (-5, 0), (-8, 0), (-2, 0), (-3, 0), (-3, 0), (-1, 0),
   (-1, 0), (-10, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-12, 0),
   (-15, 0), (-6, 0), (-6, 0), (-23, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0),
   (-6, 0), (-13, 0), (-6, 0), (-6, 0), (-6, 0), (-5, 0), (-6, 0), (-5, 0),
   (-5, 0), (-7, 0), (-15, 0), (-6, 0), (-4, 0), ( 1, 0), (-5, 0), (-4, 0),
   (-4, 0), (-4, 0), (-4, 0), (-1, 0), (-4, 0), (-1, 0), (-4, 0), ( 3, 0),
   (-3, 0), (-2, 0), (-5, 0), (-3, 0), ( 0, 0), (-8, 0), (-5, 0), ( 3, 0),
   (-1, 0), (-4, 0), (-6, 0), (-8, 0), (-4, 0), (-3, 0), (-4, 0), (-4, 0),
   (-8, 0), (-10, 0), (-5, 0), (-4, 0), ( 3, 0), ( 3, 0), (-5, 0), (-6, 0),
   (-4, 0), (-6, 0), (-5, 0), (-1, 0));

CreateLayer               Main;
LayerSetImage             Main 'HarlowSolidItalic40Bold';
LayerSetAscent            Main 46;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (13);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 40;

SetDefaultPointSize  40;
